home *** CD-ROM | disk | FTP | other *** search
- #ifndef PRAGMAS_MATHTRANS_PRAGMAS_H
- #define PRAGMAS_MATHTRANS_PRAGMAS_H
-
- /*
- ** $VER: mathtrans_pragmas.h 40.1 (17.5.1996)
- ** Includes Release 44.1
- **
- ** Direct ROM interface (pragma) definitions.
- **
- ** Copyright © 1999 Amiga, Inc.
- ** All Rights Reserved
- */
-
- #if defined(LATTICE) || defined(__SASC) || defined(_DCC)
- #ifndef __CLIB_PRAGMA_LIBCALL
- #define __CLIB_PRAGMA_LIBCALL
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #else /* __MAXON__, __STORM__ or AZTEC_C */
- #ifndef __CLIB_PRAGMA_AMICALL
- #define __CLIB_PRAGMA_AMICALL
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* */
-
- #if defined(__SASC) || defined(__STORM__)
- #ifndef __CLIB_PRAGMA_TAGCALL
- #define __CLIB_PRAGMA_TAGCALL
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #endif /* __MAXON__, __STORM__ or AZTEC_C */
-
- #ifndef CLIB_MATHTRANS_PROTOS_H
- #include <clib/mathtrans_protos.h>
- #endif /* CLIB_MATHTRANS_PROTOS_H */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPAtan 1e 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x1e, SPAtan(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPSin 24 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x24, SPSin(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPCos 2a 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x2a, SPCos(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPTan 30 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x30, SPTan(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPSincos 36 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x36, SPSincos(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPSinh 3c 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x3c, SPSinh(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPCosh 42 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x42, SPCosh(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPTanh 48 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x48, SPTanh(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPExp 4e 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x4e, SPExp(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPLog 54 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x54, SPLog(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPPow 5a 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x5a, SPPow(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPSqrt 60 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x60, SPSqrt(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPTieee 66 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x66, SPTieee(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPFieee 6c 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x6c, SPFieee(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- /*--- functions in V31 or higher (Release 1.1) ---*/
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPAsin 72 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x72, SPAsin(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPAcos 78 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x78, SPAcos(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathTransBase SPLog10 7e 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathTransBase, 0x7e, SPLog10(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- #endif /* PRAGMAS_MATHTRANS_PRAGMAS_H */
-